home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / programr / genmix1b.zip / GENMIX / SRC / PORTMEM.C < prev    next >
C/C++ Source or Header  |  1995-04-12  |  3KB  |  202 lines
  1. /* PORTMEM.C -- Memory allocation 
  2.  */
  3.  
  4. #include "port.h"
  5.  
  6.  
  7. /* -------- MACINTOSH 68k / POWER PC -------- */
  8.  
  9. #if ismac || isppc
  10.  
  11. void    portFatalError(rescode res, short where)
  12. {
  13.     Debugger();
  14. } 
  15.  
  16. long    memGetMaxAlloc()
  17. {
  18.     long    siz;
  19.  
  20.     siz = MaxBlock();
  21.     #if isdebug
  22.         if (MemErr()) portFatalError(badmem, 0);
  23.     #endif;
  24.     return siz;
  25. }
  26.  
  27. long    memGetStackSpace()
  28. {
  29.     long    siz;
  30.  
  31.     siz = StackSpace();
  32.     #if isdebug
  33.         if (!siz) portFatalError(badmem, 0);
  34.     #endif
  35.     return siz;
  36. }
  37.  
  38. void    memClear(pmem p, long siz)
  39. {
  40.     memset(p, 0, siz);
  41.     return;
  42. }
  43.  
  44. void    memSet(pmem p, char c, long siz)
  45. {
  46.     memset(p, c, siz);
  47.     return;
  48. }
  49.  
  50. void    memCopy(pmem psrc, pmem pdest, long siz)
  51. {
  52.     memcpy(pdest, psrc, siz);
  53.     return;
  54. }
  55.  
  56. void    memMove(pmem psrc, pmem pdest, long siz)
  57. {
  58.     memmove(pdest, psrc, siz);
  59.     return;
  60. }
  61.  
  62. pmem        memNew(long siz)
  63. {
  64.     pmem        pdata;
  65.     
  66.     pdata = NewPtr(siz);
  67.     if (LMGetMemErr()) portFatalError(badmem, 0);
  68.     return pdata;
  69. }
  70.  
  71. void    memDispose(pmem pdata)
  72. {
  73.     DisposPtr(pdata);
  74.     #if isdebug
  75.         if (LMGetMemErr()) portFatalError(badmem, 0);
  76.     #endif
  77.     return;
  78. }
  79.  
  80. long    memGetSize(pmem pdata)
  81. {
  82.     long size;
  83.     
  84.     size = GetPtrSize(pdata);
  85.     #if isdebug
  86.         if (LMGetMemErr()) portFatalError(badmem, 0);
  87.     #endif
  88.     return size;
  89. }
  90.  
  91. #endif    // if ismac || isppc
  92.  
  93.  
  94. /* -------- WINDOWS 31/95/NT -------- */
  95.  
  96. #if    iswin
  97.  
  98. void portFatalError(rescode type, short num)
  99. {
  100.     char    *msg;
  101.     char    msgs[80];
  102.  
  103.     switch (type) {
  104.         case badsid:    msg="bad star id: %d";                break;
  105.         case badsiz:    msg="bad star file size: %d";        break;
  106.         case badmem:    msg="memory error: %d";                break;
  107.         case badmat:    msg="bad star file version: %d";    break;
  108.         case badfil:    msg="file error: %d";                break;
  109.         case badtxt:    msg="text error: %d";                break;
  110.         case badlok:    msg="bad lock use count: %d";        break;
  111.         case badlog:    msg="logic error: %d";                break;
  112.         default:        msg="undefined %d";                    break;
  113.     }
  114.     sprintf(msgs, msg, num);
  115.     #if istest
  116.     DebugBreak();
  117.     #else
  118.     FatalAppExit(0, msgs);
  119.     #endif
  120. }
  121.  
  122. long    memGetMaxAlloc()
  123. {
  124.     MEMORYSTATUS    ms;
  125.     DWORD            siz;
  126.     
  127.     ms.dwLength = sizeof(MEMORYSTATUS);
  128.     GlobalMemoryStatus(&ms);
  129.     siz = ms.dwAvailVirtual;
  130.     if (ms.dwAvailPageFile < siz) siz = ms.dwAvailPageFile;
  131.     return (long) siz;
  132. }
  133.  
  134. long    memGetStackSpace()
  135. {
  136.     return memGetMaxAlloc();
  137. }
  138.  
  139. void    memClear(pmem pdata, long siz)
  140. {
  141.     ZeroMemory((PVOID)pdata, (DWORD) siz);
  142.     return;
  143. }
  144.  
  145. void    memSet(pmem pdata, char c, long siz)
  146. {
  147.     FillMemory((PVOID)pdata, (DWORD)siz, (BYTE)c);
  148.     return;
  149. }
  150.  
  151. void    memCopy(pmem psrc, pmem pdest, long siz)
  152. {
  153.     CopyMemory((PVOID)pdest, (PVOID)psrc, (DWORD)siz);
  154.     return;
  155. }
  156.  
  157. void    memMove(pmem psrc, pmem pdest, long siz)
  158. {
  159.     MoveMemory((PVOID)pdest, (PVOID)psrc, (DWORD)siz);
  160.     return;
  161. }
  162.  
  163. pmem    memNew(long siz)
  164. {
  165.     LPSTR        p;
  166.    
  167.     if (siz <= 0) siz = 1;
  168.     p = (LPSTR) GlobalAlloc(GMEM_FIXED, siz);
  169.     if (!p) portFatalError(badmem, 0);
  170.     return (pmem) p;
  171. }
  172.  
  173. void    memDispose(pmem pdata)
  174. {    
  175.     HGLOBAL        res;    
  176.  
  177.     res = GlobalFree((HANDLE)pdata);
  178.     #if isdebug
  179.         if (res) portFatalError(badmem, 0);
  180.     #endif
  181.     return;
  182. }
  183.  
  184. long    memGetSize(pmem pdata)
  185. {
  186.     DWORD    size;
  187.  
  188.     #if isdebug
  189.         if (GlobalFlags((HANDLE)pdata) == GMEM_INVALID_HANDLE) 
  190.             portFatalError(badmem, 0);
  191.     #endif
  192.     size = GlobalSize((HANDLE)pdata);
  193.     #if isdebug
  194.         if (!size) portFatalError(badmem, 0);
  195.     #endif
  196.     return (long) size;
  197. }
  198.  
  199. #endif    // if iswin
  200.  
  201.  
  202.